home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib08.dsk / LAMP LOADER.bas < prev    next >
BASIC Source File  |  2023-02-26  |  523b  |  11 lines
  1. 100  HOME : CALL 42350: REM  CATALOG
  2. 110  PRINT  CHR$(13) + CHR$(4)"BLOAD LAMP,A$7000": REM  LOAD BELOW HIMEM
  3. 120  POKE 60,0: POKE 61,112: REM  START=$7000
  4. 130  POKE 62,25: POKE 63,117: REM  END=$7519
  5. 140  POKE 66,230: POKE 67,151: REM  DESTINATION=$97E6
  6. 150  POKE 768,160: POKE 769,0: REM  LDY #00
  7. 160  POKE 770,76: POKE 771,44: POKE 772,254: REM  JMP $FE2C
  8. 170  CALL 768: REM  MOVE ROUTINE
  9. 180  CALL 38886: REM  SET "&" HOOK
  10. 190  POKE 40192,191: POKE 40193,151: REM  SET $9D00-1 TO $97BF
  11. 200  CALL 979: REM  COLDSTART DOS